home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 201-225 / disk_201 / draco / drinc / complex.g next >
Text File  |  1992-05-06  |  661b  |  31 lines
  1. type
  2. „ComplexBase_t=struct{
  3. ˆfloatcmpl_real;
  4. ˆfloatcmpl_imag;
  5. „},
  6.  
  7. „complex=("_cmpl",ComplexBase_t,
  8. OP_ADD|OP_SUB|OP_MUL|OP_DIV|
  9. OP_NEG|OP_CPR|OP_PUT|OP_GET);
  10.  
  11. extern
  12. „cmplInitialize()void,
  13. „cmpl(floatre,im)complex,
  14. „cmplRe(complexc)float,
  15. „cmplIm(complexc)float,
  16. „cmplAbs(complexc)float,
  17. „cmplSqrt(complexn)complex,
  18. „cmplArg(complexn)float,
  19. „cmplNorm(complexn)float,
  20. „cmplConj(complexn)complex,
  21. „cmplExp(complexn)complex,
  22. „cmplLog(complexn)complex,
  23. „cmplSin(complexn)complex,
  24. „cmplCos(complexn)complex,
  25. „cmplTan(complexn)complex,
  26. /*
  27. „cmplAsin(complexn)complex,
  28. „cmplAcos(complexn)complex,
  29. */
  30. „cmplAtan(complexn)complex;
  31.